.text

prepare:
	movl	$0x10, %eax
	movl	%eax, %ds
	movl	%eax, %es
	movl	%eax, %fs
	movl	%eax, %gs
1:
	jmp 1b
	xorl	%eax, %eax
check_a20:
	incl	%eax
	movl	%eax, 0x000000
	cmpl	%eax, 0x100000
	je	check_a20

do_move:
	cld	
	movl	$0x24000, %ecx		# max value is 0x90000 / 4
change:	
	movl	$0x10000, %esi
	movl	$0x100000, %edi
	rep
	movsl
	
	jmp	*(0x100000)

